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IDispatch 



o 



I Unknown 



o 



ISNMPRqstQ 



□ 



CheckExceptions ( ) ; 




❖ GUID([out, retval] BSTR *pVal) ; 

❖ TAG ([out, retval] VARIANT* pVal) ; 

❖ TAG ( [in] VARIANT NewVal) ; 

❖ Target ([out, retval] BSTR *pVal) ; 

❖ Target ([in] BSTR newVal) ; 

♦> Targe t IP ([ out , retval] BSTR *pVal) ; 

❖ Community ( [out , retval] BSTR *pVal) ; 

❖ Community ( [in] BSTR newVal) ; 

❖ Timeout ([ out , retval] long *pVal) ; 

❖ Timeout ([in] long newVal); 

❖ Retries ( [out, retval] short *pVal) ; 

❖ Retries ([in] short newVal); 

❖ LastOp([out, retval] AZSNMP OPCODE ENUM 
*pVal) ; 

❖ OID([out, retval] BSTR *pVal) ; 

❖ OID([in] BSTR newVal); 

❖ OIDLiteral ( [out, retval] BSTR *pVal) ; 

❖ Value ([out, retval] VARIANT* pVal) ; 

❖ VT([out, retval] AZSNMP VT ENUM *pVal) ; 

❖ URL ( [out, retval] BSTR *pVal) ; 

❖ URL ( [in] BSTR newVal) ; 




(Unknown 



ISNMPMgrAsyncQ- 



□ Init (int ThreadPool Count) ; 

□ Reset () ; 

□ Ping (ISNMPRqst ** Request) ; 

□ PinqRanqe ( BSTR IPBaseAddress, int 
askBitLength, int Timeout, int Retries, 
VARIANT NewTAG, [out, retval] int* Cnt) ; 

□ Open ( ISNMPRqst ** Request) / 

□ GetNext (ISNMPRqst ** Request) ; 

□ Get ( ISNMPRqst ** Request) ; 

□ Close ( ISNMPRqst ** Request) ; 

□ ReadURL (ISNMPRqst ** Request) ; 

□ ResolveName (ISNMPRqst **Request) ; 

❖ ThreadCount ( [out, retval] long *pVal) ; 

❖ PendingSNMP ( [out, retval] long *pVal) ; 

❖ PendinqPING ( [out , retval] long *pVal) ; 

❖ PendingRE SOLVE ( [out, retval] long *pVal) , 

❖ PendingURL ( [out , retval] long *pVal) ; 

❖ PendingEVENTS ( [out, retval] long *pVal) ; 

> OpenReady (ISNMPRqst* Request) ; 
^ OpenFail (ISNMPRqst* Request) ; 
^ Da taReady ( I SNMPRqs t * Request) ; 

> DataFail (ISNMPRqst* Request) ; 

> PingReady (ISNMPRqst * Request) ; 
^ PinqFail (ISNMPRqst * Request) ; 

^ ResolveFail (ISNMPRqst *Request) ; 

> Res olveReady ( I SNMPRqs t * Request) ; 

> ReadURLFail (ISNMPRqst * Request) ; 

> ReadURLReady ( I SNMPRqs t * Request) ; 
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IDispatch ] _ t >? \ ■ { 



lOnknown •CXeCUieS On Trie ^ 

^ , calling process thread .: ' 



SNMPRqst 







ISNMPMgrA^^^ 



... 



BOO 



Submit 
request 
into the 
queue 



Ho2~ 



Failed Requests 
submitted for retry 




SNMPRqst 



Request Queue 
Hoy 



yoy 




Worker Thread 



Submit Processed Request 
Object to Result Queue 




Worker 
Thread M°° 
Pool 



Result Queue 



SNMPRqst 






SNMPRqst 












Signal Thread 



Switch Context to 
. Calling Thread . 




• Executes on. the . 
• . ' ' calling process thread : 



>: 



o 



IDispatch 



ICollectorO- 



□ 

a 

□ 
□ 

□ 
□ 



CallCount ( [out, retval] long *pVal 
Value ([out, retval] VARIANT* pVal) ; 
TargetIP([out, retval] VARIANT* pVal) ; 
DNSName([out, retval] VARIANT* pVal) ; 
WorkArea([in] VARIANT NewVal); 
WorkArea([out, retval] VARIANT NewVal) ; 



LogEvent ( [in] BSTR Message, 
optional] long LogLevel) ; 



Abort ([in] BSTR ErrorDescription ); 
Continue ( [in] long Opcode); 

DDRAddlnteger ( [in] BSTR FieldName, [in] 
long FieldValue) ; 

DDRAddlnteqerArray ( [in] BSTR FieldName, 
[in] VARIANT FieldValues) ; 



DDRAddString([in] BSTR FieldName, [in] 
BSTR FieldValue) ; 

DDRAddStringArray ( [in] BSTR FieldName, 
[in] VARIANT FieldValues) ; 

fn CollectIpMacInfo([in] VARIANT Value, 
[out, retval] BSTR *pMAC) ; 
fn GetOctetRoles ( [in] VARIANT Value, 
[out] BSTR *pRoles) ; 
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Collector 



Const oid_name_str = "system. sysName . 0" 
Dim NetBiosName 
Dim St 

If Collector.CallCount=l Then '// First Call -- ! 
Collector .OID = oid_name_str 
Col 1 ec tor . Continue OpOe t 



If Success Then 

NetBiosName « Collector .Value 
If Len (NetBiosName) «0 Then 

NetBiosName=Col lector .DNSName 
If Len (NetBiosName) =0 Then 

Collector .Abort "" & Collector .Targe tIP & n No Name available" 
Exit Function 
End If 
End If 

St=InStr (NetBiosName, " . " ) 
If St Then 

NetBiosName=Left (NetBiosName, St-1) 
End If 

Collector.DDRName = Replace (NetBiosName, ■ ","_") 

Collector. DDRAddString "Netbios Name", NetBiosName, 32, ADDPROP_NAME Or 
ADDPROP_KEY 

Collector. Continue OpDone 
Else 

Col lector. Abort "" & Collector .TargetIP & " No Name available" 



Else 



End If 



End If 
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ScHedfe 

SNMP 01D Mapping 
■3Com 
-fjAdtran 

ADVA GmbH 
-ft Alteon Network* 
H I Atiga Network* 

^ATLRrpdict* 

Btocede Gorrmntedttom 



Cbcc (Lartbonix) 
Cisco p-ant/orw) 
-M Erriufe* 
— j j [ Ert««ty» 
H I i Ep*on£cfeoCorp 

Fiontia Softwaie Devekjpmerrt j|i 
-M HewWeckerd ^ 

uirtcam 

-f§NetBob 
NetMen&p 
Netv^ Appliance 
NobvoAA««ocJate$ 
Newbrtige Network} Corp. 
■Novell 
--||:Picturetd 
QMS 





NdworK Dbcoyay (NJCHGW86TJ320J 
SNMPQID Mapping 



| Network DiKCyery (NJCHGW88l32Q)^ 



Operating System 
System Rofej 

MACAddte** 
SoftwaieUst 
Hardware Qit 



Const ■■ oid^naaejstr 
Dix? NetBioslJane. 
Dim 5t : 



If Collector. CailCounf«i Then »// First Call « 

Collector. OID - oi<Tn«ftp_«tr 

Collector. Continue OpGet 
Else 

If Success Then 

«etBloaHeaft. •» Collector . ScriagVaiue 
If Len(NetBtosNai2c)-'0 Then 

^et8iOflN«peK^I^.e.«tor . DKSNaise 
If ;Leix|»etBi6sHaiee)«0 Then 

.Collector. JUaort * Collector, Target IP t " Do Hvsm 
Exit Function 

2nd If 
Endl If. 

Se*lnStr matBifrRam,;*'**-) 
If St Then 

Bet8ioaHeife**Lef t (8etSio«Haae, St-i) 
End If 

Collector ; DpaH&^e. ~ *e$lace INetBioaNerofi, " w , M _") 
Col lector . DD2Aad3 t ring "flet'bioa >te»e" , Net SipaSaa- , 32 , AT>DPROP_K 
Collector ♦ Continue Oppone 



21se 



End If 
End If 



Collector. abort < Collector. Target IP i " Ho Name available" 
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